alias susu {
  window @Setup 12 arial
  echo @Setup [7Devilz Script] v
  echo @Setup 7Oleh CoLd^^pLaY
  echo @Setup -Channel-
  echo @Setup Channel teks
  set %cfp $?="Kawalan Flood Channel (on/off)"
  if (%cfp == on) { .enable #floodchan }
  if (%cfp == off) { .disable #floodchan }
  unset %cfp
  set %fpo $?="Termasuk Operator? (ya/tak)"
  if (%fpo == ya) { set %fpo2 Included }
  if (%fpo == tak) { set %fpo2 Excluded }
  set %fcsen1 $?="Sensitivity? (high/med/low)"
  if (%fcsen1 == high) { set %fcsen 4 }
  if (%fcsen1 == med) { set %fcsen 2 }
  if (%fcsen1 == low) { set %fcsen 1 }
  unset %fcsen1
  echo @Setup Nick
  set %nkfp $?="Kawalan Flood Nickname? (on/off)"
  if (%nkfp == on) { .enable #floodnick }
  if (%nkfp == off) { .disable #floodnick }
  unset %nkfp
  set %nkpo $?="Termasuk Operator? (ya/tak)"
  if (%nkpo == ya) { set %nkpo2 Included }
  if (%nkpo == tak) { set %nkpo2 Excluded }
  set %fnksen1 $?="Sensitivity (high/med/low)"
  if (%fnksen1 == high) { set %fnksen 4 }
  if (%fnksen1 == med) { set %fnksen 2 }
  if (%fnksen1 == low) { set %fnksen 1 }
  unset %fnksen1
  echo @Setup Ulangan Channel
  set %repfp $?="Kawalan Flood Ulangan? (on/off)"
  if (%repfp == on) { .enable #floodrepeat }
  if (%repfp == off) { .disable #floodrepeat }
  unset %repfp
  set %frepo $?="Termasuk Operator? (ya/tak)"
  if (%frepo == ya) { set %frepo2 Included }
  if (%frepo == tak) { set %frepo2 Excluded }
  set %frepsen1 $?="Sensitivity? (high/med/low)"
  if (%frepsen1 == high) { set %frepsen 4 }
  if (%frepsen1 == med) { set %frepsen 2 }
  if (%frepsen1 == low) { set %frepsen 1 }
  unset %frepsen1
  echo @Setup Kawalan Flood
  set %revfp $?="Kawalan Flood (on/off)"
  if (%revfp == on) { .enable #floodrevolve }
  if (%revfp == off) { .disable #floodrevolve }
  unset %revfp
  set %frevsen1 $?="Sensitivity (high/med/low)"
  if (%frevsen1 == high) { set %frevsen 4 }
  if (%frevsen1 == med) { set %frevsen 2 }
  if (%frevsen1 == low) { set %frevsen 1 }
  unset %frevsen1
  echo @Setup -Persendirian-
  echo @Setup Notis
  set %nfp $?="Kawalan Flood Notis (on/off)"
  if (%nfp == on) { .enable #floodnotice }
  if (%nfp == off) { .disable #floodnotice }
  unset %nfp
  set %fnsen1 $?="Sensitivity? (high/med/low)"
  if (%fnsen1 == high) { set %fnsen 4 }
  if (%fnsen1 == med) { set %fnsen 2 }
  if (%fnsen1 == low) { set %fnsen 1 }
  unset %fnsen1
  echo @Setup Mesej Persendirian
  set %mfp $?="Kawalan Flood Mesej? (on/off)"
  if (%mfp == on) { .enable #floodmessage }
  if (%mfp == off) { .disable #floodmessage }
  unset %mfp
  set %fmsen1 $?="Sensitivity? (high/med/low)"
  if (%fmsen1 == high) { set %fmsen 4 }
  if (%fmsen1 == med) { set %fmsen 2 }
  if (%fmsen1 == low) { set %fmsen 1 }
  unset %fmsen1
  echo @Setup CTCP
  set %ccfp $?="Kawalan Felad CTCP? (on/off)"
  if (%ccfp == on) { .enable #floodctcp }
  if (%ccfp == off) { .disable #floodctcp }
  unset %ccfp
  set %fccsen1 $?="Sensitivity? (high/med/low)"
  if (%fccsen1 == high) { set %fccsen 4 }
  if (%fccsen1 == med) { set %fccsen 2 }
  if (%fccsen1 == low) { set %fccsen 1 }
  unset %fccsen1
  echo @Setup -Setup Tamat-
}


menu menubar {
  Kawalan Flood
  .Channel
  ..Teks
  ...On:.enable #floodchan | echo -a 15Kawalan Flood Channel DIHIDUPKAN
  ...Off:.disable #floodchan | echo -a 15Kawalan Flood Channel DIMATIKAN
  ...-
  ...Operator
  ....Termasuk:set %fpo yes | set %fpo2 Included | echo -a 15Kawalan Flood Channel - Termasuk OPs
  ....Tak Termasuk:set %fpo no | set %fpo2 Excluded | echo -a 15Kawalan FloodChannel - Tak Termasuk OPs
  ...Sensitivity
  ....Rendah:set %fcsen 1 | echo -a 15Kawalan Flood Channel - Sensitivity Rendah
  ....Sederhana:set %fcsen 2 | echo -a 15Kawalan Flood Channel - Sensitivity Sederhana
  ....Tinggi:set %fcsen 4 | echo -a 15Kawalan Flood Channel - Sensitivity Tinggi
  ..Nickname
  ...On:.enable #floodnick | echo -a 15Nickname FloodDIHIDUPKAN
  ...Off:.disable #floodnick | echo -a 15Nickname FloodDIMATIKAN
  ...-
  ...Kepekaan
  ....Rendah:set %fnksen 1 | echo -a 15Kawalan Felad Nick - Kepekaan Rendah
  ....Sederhana:set %fnksen 2 | echo -a 15Kawalan Felad Nick - Kepekaan Sederhana
  ....Tinggi:set %fnksen 4 | echo -a 15Kawalan Felad Nick - Kepekaan Tinggi
  .Persendirian
  ..Mesej
  ...On:.enable #floodmesssge | echo -a 15Kawalan Flood Persendirian DIHIDUPKAN
  ...Off:.disable #floodmessage | echo -a 15Kawalan Flood Persendirian DIMATIKAN
  ...-
  ...Sensitivity
  ....Rendah:set %fmsen 1 | echo -a 15Kawalan Flood Persendirian - Sensitivity Rendah
  ....Sederhana:set %fmsen 2 | echo -a 15Kawalan Flood Persendirian - Sensitivity Sederhana
  ....Tinggi:set %fmsen 4 | echo -a 15Kawalan Flood Persendirian - Sensitivity Tinggi
  ..CTCP
  ...On:.enable #floodctcp | echo -a 15Flood CTCP DIHIDUPKAN
  ...Off:.disable #floodctcp | echo -a 15Flood CTCP DIMATIKAN
  ...-
  ...Sensitivity
  ....Low:set %fccsen 1 | echo -a 15Flood CTCP - Sensitivity Rendah
  ....Medium:set %fccsen 2 | echo -a 15Flood CTCP - Sensitivity Sederhana
  ....High:set %fccsen 4 | echo -a 15Flood CTCP -  Sensitivity Tinggi
}


#floodrepeat on
on 1:text:*:#:{
  if ($me isop $chan) {
    if ($nick isop $chan) { goto %frepo }
    :yes
    if (%floodrep. [ $+ [ $nick ] ] == $1-) { 
      inc %floodrep2. [ $+ [ $nick ] ] 1
      .timer 1 %frepsen dec %floodrep2. [ $+ [ $nick ] ] 1
      goto flood 
    }
    set %floodrep. [ $+ [ $nick ] ] $1-
    .timer 1 %frepsen unset floodrep. [ $+ [ $nick ] ] 
    :flood
    if (%floodrep2. [ $+ [ $nick ] ] > 3) { ban -u10 $chan $nick 2 | kick $chan $nick Flood Channel [Kick/Banned[Ops %frepo2 $+ ]  0,4-<{Devilz Script}>-
      :no
    }
  }
}
#floodrepeat end

#floodchan on
on 1:text:*:#:{
  if ($nick isop $chan) { goto %fpo }
  :yes
  if ($me isop $chan) {
    inc %floodc. [ $+ [ $nick ] ] 1
    .timer 1 %fcsen dec %floodc. [ $+ [ $nick ] ] 1
    if (%floodc. [ $+ [ $nick ] ] > 3) { ban -u10 $chan $nick 2 | kick $chan $nick Flood Channel[Ops %fpo2 $+ ]  0,4-<{SuSu v98}>- | unset (%floodc. [ $+ [ $nick ] ]  }
    halt
  }
  :no
  halt
}
#floodchan end

#floodnotice on
on 1:notice:*:*:{
  inc %floodn. [ $+ [ $nick ] ] 1
  .timer 1 %fnsen dec %floodn. [ $+ [ $nick ] ] 1
  if (%floodn. [ $+ [ $nick ] ] > 3) { ignore -nu10 $nick 2 | notice $nick Flood Notis  0,4-<{Devilz Script}>- }
}
#floodnotice end

#floodmessage on
on 1:text:*:?:{
  inc %floodm. [ $+ [ $nick ] ] 1
  .timer 1 %fmsen dec %floodm. [ $+ [ $nick ] ] 1
  if (%floodm. [ $+ [ $nick ] ] > 3) { ignore -pu10 $nick 2 | notice $nick Flood Persendirian  0,4-<{Devilz Script}>- }
}
#floodmessage end

#floodctcp on
on 1:ctcp:*:{
  inc %floodcc. [ $+ [ $nick ] ] 1
  .timer 1 %fccsen dec %floodcc. [ $+ [ $nick ] ] 1
  if (%floodcc. [ $+ [ $nick ] ] > 3) { ignore -pu10 $nick 2 | notice $nick Flood CTCP  0,4-<{Devilz Script}>- }
}
#floodctcp end


#floodnick on
on 1:nick:{
  if ($me isop $chan) {
    if ($nick isop $chan) { goto %nkfo }
    :yes
    .guser 10 $nick
    .timer 1 %fnksen .rlevel 10
    :no
  }
}
on 10:nick:{
  .rlevel 10
  .guser 20 $nick
  .timer 1 %fnksen .rlevel 20
}
on 20:nick:{
  .rlevel 20
  .guser 30 $nick
  .timer 1 %fnksen .rlevel 30
}
on 30:nick:{
  .rlevel 20
  .rlevel 30
  ban -u20 $chan $nick 2
  kick $chan $nick Flood Nick[Ops %nkfo2 $+ ]  0,4-<{Devilz Script}>-
}
#floodnick end

#floodrevolve on
on 1:join:#:{
  if ($me isop $chan) {
    .auser 40 $nick
    timer 1 %frevsen .ruser 40 $nick
  }
}
on 40:join:#:{
  .auser 50 $nick
  timer 1 %frevsen .ruser 50 $nick
}
on 50:join:#:{
  .auser 60 $nick
  timer 1 %frevsen .ruser 60 $nick
}
on 60:join:#:{
  .ruser 60 $nick
  ban -u20 $chan $nick 2
  kick $chan $nick Flood  0,4-<{Devilz Script}>-
}
#floodrevolve end
